home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1993 July / Internet Tools.iso / RockRidge / mail / pp / pp-6.0 / Lib / x400 / transfer.py < prev    next >
Encoding:
Text File  |  1991-12-18  |  1.0 KB  |  57 lines
  1. -- transfer.py:
  2.  
  3.  
  4. -- @(#) $Header: /xtel/pp/pp-beta/Lib/x400/RCS/transfer.py,v 6.0 1991/12/18 20:25:37 jpo Rel $
  5. --
  6. -- $Log: transfer.py,v $
  7. -- Revision 6.0  1991/12/18  20:25:37  jpo
  8. -- Release 6.0
  9. --
  10. --
  11. --
  12.  
  13.  
  14. Trans
  15. -- {iso identified-organisation(3) locator(999) modules(0) transfer(8)}
  16. DEFINITIONS IMPLICIT TAGS ::=
  17. BEGIN
  18.  
  19. IMPORTS 
  20.     MessageTransferEnvelope, Content,
  21.     ReportTransferEnvelope, ReportTransferContent,
  22.     ProbeTransferEnvelope
  23. -- Extras
  24.     ,
  25.     MTABindArgument, MTABindResult, MTABindError
  26. -- End Extras
  27.     FROM MTA;
  28.  
  29. MtsAPDU ::=
  30.     CHOICE {
  31.         message [0] MessageAPDU,
  32.         report  [1] ReportAPDU,
  33.         probe   [2] ProbeTransferEnvelope}
  34.  
  35. MessageAPDU ::=
  36.     SEQUENCE {
  37.         envelope MessageTransferEnvelope,
  38.         content  Content}
  39.  
  40. ReportAPDU ::=
  41.     SEQUENCE {
  42.         envelope ReportTransferEnvelope,
  43.         content  ReportTransferContent}
  44.  
  45. ProbeAPDU ::=
  46.     ProbeTransferEnvelope
  47.  
  48. --- additions for 1988 BIND macro
  49.  
  50. Bind1988Argument ::= [16] EXPLICIT MTABindArgument
  51.  
  52. Bind1988Result ::= [17] EXPLICIT MTABindResult
  53.  
  54. Bind1988Error ::= [18] EXPLICIT MTABindError
  55.  
  56. END
  57.